﻿Public Class Actividad
    Inherits BasePersistencia

    Sub New()
        MyBase.Persistencia = EstadoPersistencia.INSERT
    End Sub

    Private _descripcion As String
    Private _usuario As Usuario
    Private _progreso As Decimal
    Private _tipo As TipoActividad
    Private _adjuntos As Archivo()
    Private _fecha As System.Nullable(Of Date) = DateTime.Now

#Region "Propiedades"

    Public Property Descripcion() As String
        Get
            Return _descripcion
        End Get
        Set(ByVal value As String)
            _descripcion = value
        End Set
    End Property


    Public Property Usuario() As Usuario
        Get
            Return _usuario
        End Get
        Set(ByVal value As Usuario)
            _usuario = value
        End Set
    End Property

    Public Property Progreso() As Decimal
        Get
            Return _progreso
        End Get
        Set(ByVal value As Decimal)
            _progreso = value
        End Set
    End Property

    Public Property Tipo() As TipoActividad
        Get
            Return _tipo
        End Get
        Set(ByVal value As TipoActividad)
            _tipo = value
        End Set
    End Property

    Public Property Adjuntos() As Archivo()
        Get
            Return _adjuntos
        End Get
        Set(ByVal value As Archivo())
            _adjuntos = value
        End Set
    End Property

    Public Property Fecha() As System.Nullable(Of Date)
        Get
            Return _fecha
        End Get
        Set(ByVal value As System.Nullable(Of Date))
            _fecha = value
        End Set
    End Property

#End Region

#Region "Metodos Publicos"

#End Region


End Class
